home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Merciful 2
/
Merciful - Disc 2.iso
/
software
/
p
/
penguinsagainstaller.dms
/
penguinsagainstaller.adf
/
InstallPeng
next >
Wrap
Text File
|
1978-01-09
|
2KB
|
100 lines
; Penguins AGA installer Script
; Written by DeMOnS & Cyanide of LsD
; Additional Help From KiWi / InDi
(complete 0)
(set @default-dest "Workbench:"
)
(complete 10)
(set mp-dest
(askdir
(prompt "Where would you like to install Penguins?")
(help @askdir-help)
(default @default-dest)
)
)
(set @default-dest mp-dest)
(Working "Creating Penguins Directory Structure")
(makedir (tackon mp-dest "Penguins"))
(makedir (tackon mp-dest "penguins/Data"))
(complete 20)
(
(working "Installing Disk1....")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Disk1:data/")(all)
(dest (tackon mp-dest "penguins/data"))
)
)
(complete 40)
(
(working "Installing Disk2....")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Disk2:data/")(all)
(dest (tackon mp-dest "penguins/data"))
)
)
(complete 60)
(
(working "Installing Disk3....")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "Disk3:data/")(all)
(dest (tackon mp-dest "penguins/data"))
)
)
(complete 80)
(
(working "Installing Patched Files....")
(copyfiles
(prompt "")
(help @copyfiles-help)
(source "PengInstr:Patches/")(all)
(dest (tackon mp-dest "penguins"))
)
)
(complete 90)
(startup "PENGUINS"
(prompt
"Some assigns need to be added to your "
"\"S:User-Startup\" so that your system will be properly "
"configured to play Penguins.\n\n"
"Press Proceed for them to be added.\n")
(help
"This will add commands to your S:user-startup file to "
"allow Penguins to find all the files.")
(command "ASSIGN DISK1: " (tackon mp-dest "penguins")"\n")
(command "ASSIGN DISK2: " (tackon mp-dest "penguins")"\n")
(command "ASSIGN DISK3: " (tackon mp-dest "penguins")"\n")
(command "ASSIGN CYN: " (tackon mp-dest "penguins")"\n")
(command "ASSIGN DATA: " (tackon mp-dest "penguins/data")"\n")
)
(complete 100)
(exit)